home *** CD-ROM | disk | FTP | other *** search
/ Animation How-To / Animation How-to CD.iso / PLY / CHAPTER3 / POP / MOOSE.PI next >
Text File  |  1994-01-01  |  2KB  |  100 lines
  1. // MOOSE.PI
  2. // Moose shaped blob reflection deal
  3.  
  4. include "\ply\colors.inc"
  5.  
  6. start_frame 0
  7. end_frame 89
  8. total_frames 90
  9. define index 360/total_frames
  10.  
  11. outfile "moose"
  12.  
  13. viewpoint {
  14.    from <0.8,0.8,0.0>
  15.    at <0.0,0.0,0.0>
  16.    up <0,1,0>
  17.    angle 90
  18.    resolution 320,200
  19.    aspect 1.433
  20.    }
  21.  
  22. background SkyBlue
  23. light <0.7,0.7,0.7>,<10,12,1>
  24. define ang frame*index
  25.  
  26. define unit_sphere object { sphere <0, 0, 0>, 1.0 }
  27.  
  28. define eye 
  29.    object {
  30.       object {
  31.          sphere <0.0,0.0,0.0>,0.10
  32.          texture {
  33.             surface {
  34.                ambient red, 0.2
  35.                diffuse red, 0.5
  36.                specular white, 0.7
  37.             }
  38.          }
  39.       }
  40.    +  object {
  41.          sphere <0.0,0.0,0.0>,0.05
  42.          texture {
  43.             surface {
  44.                ambient Yellow, 0.5
  45.                diffuse Coral, 0.8
  46.                specular white, 0.9
  47.             }
  48.          }
  49.       translate <0.05,0.05,0.0 >
  50.       }
  51.    }
  52.  
  53. define weird_shape
  54. object {
  55.    blob 6.6:
  56.       7, 3.0,<  0,  0,  0 >,
  57.       3, 1.0,<  1,  1,  1 >,
  58.       3, 1.0,< -1,  1,  1 >,
  59.       3, 1.0,<  1, -1,  1 >,
  60.       3, 1.0,< -1, -1,  1 >,
  61.       3, 1.0,<  1,  1, -1 >,
  62.       3, 1.0,< -1,  1, -1 >,
  63.       3, 1.0,<  1, -1, -1 >,
  64.       3, 1.0,< -1, -1, -1 >,
  65.       3, 1.0,<  0,  1,  1 >,
  66.       3, 1.0,<  0,  1, -1 >,
  67.       3, 1.0,<  0, -1,  1 >,
  68.       3, 1.0,<  0, -1, -1 >,
  69.       3, 1.0,<  1,  0,  1 >,
  70.       3, 1.0,<  1,  0, -1 >,
  71.       3, 1.0,< -1,  0,  1 >,
  72.       3, 1.0,< -1,  0, -1 >,
  73.       3, 1.0,<  1,  1,  0 >,
  74.       3, 1.0,<  1, -1,  0 >,
  75.       3, 1.0,< -1,  1,  0 >,
  76.       3, 1.0,< -1, -1,  0 >
  77.    root_solver Sturm
  78.    u_steps 20
  79.    v_steps 20
  80.    reflective_coral
  81.    }
  82.  
  83. object {
  84.    weird_shape & unit_sphere
  85.    rotate <45.0,ang,0.0>
  86.    }
  87.  
  88.  
  89. eye {
  90.     rotate <70,70,30>
  91.     translate <0.25,0.25,0.25>
  92.     rotate <0.0,ang,0.0>
  93.     }
  94.  
  95. eye {
  96.     rotate <10,-10,0>
  97.     translate <0.25,0.25,-0.25>
  98.     rotate <0.0,ang,0.0>
  99.     }    
  100.